home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Language/OS - Multiplatform Resource Library
/
LANGUAGE OS.iso
/
a_utils
/
_archvrs
/
unix
/
lha101u
/
src
/
larc.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-04-24
|
1KB
|
69 lines
/***********************************************************
larc.c -- extract *.lzs
***********************************************************/
#include <stdio.h>
#include "slidehuf.h"
#define MAGIC0 18
#define MAGIC5 19
static int flag, flagcnt, matchpos;
unsigned short decode_c_lzs(void)
{
if (getbits(1)) {
return getbits(8);
} else {
matchpos = getbits(11);
return getbits(4) + 0x100;
}
}
unsigned short decode_p_lzs(void)
{
return (loc - matchpos - MAGIC0) & 0x7ff;
}
void decode_start_lzs(void)
{
init_getbits();
}
unsigned short decode_c_lz5(void)
{
int c;
if (flagcnt == 0) {
flagcnt = 8;
flag = getc(infile);
}
flagcnt--;
c = getc(infile);
if ((flag & 1) == 0) {
matchpos = c;
c = getc(infile);
matchpos += (c & 0xf0) << 4;
c &= 0x0f;
c += 0x100;
}
flag >>= 1;
return c;
}
unsigned short decode_p_lz5(void)
{
return (loc - matchpos - MAGIC5) & 0xfff;
}
void decode_start_lz5(void)
{
int i;
flagcnt = 0;
for (i = 0; i < 256; i++) memset(&text[i * 13 + 18], i, 13);
for (i = 0; i < 256; i++) text[256 * 13 + 18 + i] = i;
for (i = 0; i < 256; i++) text[256 * 13 + 256 + 18 + i] = 255 - i;
memset(&text[256 * 13 + 512 + 18], 0, 128);
memset(&text[256 * 13 + 512 + 128 + 18], ' ', 128 - 18);
}